home *** CD-ROM | disk | FTP | other *** search
- <?php
- /* $Id: profiling.php,v 2.10 2006/01/17 17:03:02 cybot_tm Exp $ */
- // vim: expandtab sw=4 ts=4 sts=4:
- /**
- * holds function for dumping profiling data
- *
- * allways use $GLOBALS here, as this script is included by footer.inc.hp
- * which can also be included from inside a function
- */
-
- if ( ! empty( $GLOBALS['DBG'] )
- && $GLOBALS['cfg']['DBG']['profile']['enable'] ) {
-
- /**
- * Displays profiling results when called
- * WARNING: this function is SLOW
- */
- function dbg_dump_profiling_results() {
- /* Applies to the original 'dbg_dump_profiling_results' function,
- * sourced from http://dd.cron.ru/dbg/download.php?h=prof_sample2
- * Copyright (c) 2002. Dmitri Dmitrienko
- * LICENCE: This source file is subject to Mozilla Public License (MPL)
- * AUTHOR: Dmitri Dmitrienko <dd@cron.ru>
- */
- dbg_get_profiler_results( $dbg_prof_results = '' );
- $cwdlen = strlen(getcwd()); // gma added var, $cwdlen = strlen(getcwd());
- echo '<br /><table xml:lang="en" dir="ltr" width="1000" cellspacing="0" cellpadding="2" style="font:8pt courier">' . "\n" .
- '<thead>' . "\n";
- // gma added "$tr ="
- $tr = '<tr>' . "\n" .
- '<th>' . $GLOBALS['strDBGModule'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGLine'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGHits'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGTimePerHitMs'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGTotalTimeMs'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGMinTimeMs'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGMaxTimeMs'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGContextID'] . '</th>' . "\n" .
- '<th>' . $GLOBALS['strDBGContext'] . '</th>' . "\n" .
- '</tr>' . "\n"; // gma change "." to ";"
- echo $tr.'</thead><tbody style="vertical-align: top">' . "\n";
- $lines = 0; // gma added "echo $tr." and "$lines = 0;"
- $ctx_name = '';
- $mod_name = '';
- $ctx_id = '';
- $odd_row = true;
- foreach ( $dbg_prof_results['line_no'] as $idx => $line_no ) {
- dbg_get_module_name( $dbg_prof_results['mod_no'][$idx], $mod_name );
-
- //if (strpos("!".$mod_name, 'dbg.php') > 0) continue;
-
- $time_sum = $dbg_prof_results['tm_sum'][$idx] * 1000;
- $time_avg_hit = $time_sum / $dbg_prof_results['hit_count'][$idx];
-
- $time_sum = sprintf( '%.3f', $time_sum );
- $time_avg_hit = sprintf('%.3f', $time_avg_hit);
- $time_min = sprintf( '%.3f', $dbg_prof_results['tm_min'][$idx] * 1000 );
- $time_max = sprintf( '%.3f', $dbg_prof_results['tm_max'][$idx] * 1000 );
- dbg_get_source_context( $dbg_prof_results['mod_no'][$idx],
- $line_no, $ctx_id );
-
- // use a default context name if needed
- if ( dbg_get_context_name( $ctx_id, $ctx_name )
- && strlen($ctx_name) == 0 ) {
- $ctx_name = "::main";
- }
-
- if ( $time_avg_hit > $GLOBALS['cfg']['DBG']['profile']['threshold'] ) {
- echo '<tr class="' . $odd_row ? 'odd' : 'even' . '">' .
- // gma changed "$mod_name" to "substr($mod_name, $cwdlen+1)"
- '<td>' . substr($mod_name, $cwdlen+1) . '</td>' .
- '<td>' . $line_no . '</td>' .
- '<td>' . $dbg_prof_results['hit_count'][$idx] . '</td>' .
- '<td>' . $time_avg_hit . '</td>' .
- '<td>' . $time_sum . '</td>' .
- '<td>' . $time_min . '</td>' .
- '<td>' . $time_max . '</td>' .
- '<td>' . $ctx_id . '</td>' .
- '<td>' . $ctx_name . '</td>' .
- '</tr>' . "\n";
-
- // gma added line. Repeats the header every x lines.
- if ( $lines === 19 ) {
- $odd_row = true;
- $lines = 0;
- echo $tr;
- } else {
- $odd_row = ! $odd_row;
- $lines++;
- }
- }
- }
- echo '</tbody></table>';
- }
- }
- /* gma ... Developer Notes
- These two scriptlets can be used as On/Off buttons in your browsers, add to links.
- ON:
- javascript: document.cookie = 'DBGSESSID=' + escape('1;d=1,p=1') + '; path=/'; document.execCommand('refresh');
- or ...
- javascript: document.cookie = 'DBGSESSID=' + escape('1;d=0,p=1') + '; path=/'; document.execCommand('refresh');
- OFF:
- javascript: document.cookie = 'DBGSESSID=' + escape('1;d=0,p=0') + '; path=/'; document.execCommand('refresh');
- */
- ?>
-